-- @Author: 作者QQ381990860
-- @Date:   2021-12-10 23:30:29
-- @Last Modified by:   作者QQ381990860
-- @Last Modified time: 2022-08-25 06:01:10
--======================================================================--
-- @作者: QQ381990860
-- @创建时间:   2019-12-03 02:17:19
-- @Last Modified time: 2020-11-17 00:34:29
--======================================================================--
local 场景类_召唤兽吞噬界面 = class(窗口逻辑)
local tp,zts,zts1
local insert = table.insert
local mouseb = 引擎.鼠标弹起
local box = 引擎.画矩形
local bw = require("gge包围盒")(0,0,140,34)
--local bd0 = {"气血","魔法","攻击","防御","速度","灵力","年限","进阶","材料","加成"}
local bd0 = {"攻击资质","防御资质","体力资质","法力资质","速度资质","躲闪资质","成长","幻兽年限"}
local format = string.format
function 场景类_召唤兽吞噬界面:初始化(根)
	self.ID = 265
	self.x = 173+(全局游戏宽度-800)/2
	self.y = 80
	self.xx = 0
	self.yy = 0
	self.注释 = "商店"
	self.可视 = false
	self.鼠标 = false
	self.焦点 = false
	self.可移动 = true
	self.窗口时间 = 0
	self.加入 = 0
	self.选中 = 0
	tp = 根
	zts = 根.字体表.华康字体
	zts1 = 根.字体表.华康字体
	self.头像组 = {}
	self.预览属性 = {}
end
function 场景类_召唤兽吞噬界面:刷新(数据)
		self.数据=数据
		self.召唤兽=nil
end
function 场景类_召唤兽吞噬界面:材料刷新(数据)
		--table.print(数据)
		self.吞噬数据=数据
		self.材料:置物品(nil)
       if self.吞噬数据.吞噬材料~=nil then
		self.材料:置物品({名称=self.吞噬数据.吞噬材料})
	else
		self.材料:置物品(nil)
	end
		self.银子:置物品({名称="金砖"})
		self.仙玉:置物品({名称="仙玉卡片"})
end
function 场景类_召唤兽吞噬界面:打开(数据)
	if self.可视 then
		self.可视 = false
		self.资源组 =nil
		self.情谊大=nil
		self.ddjc=nil
		self.lsjc=nil
		self.召唤兽=nil
		self.吞噬数据=nil
	else
		self:重新加载资源()
		self.数据 = 数据
		if  self.x > 全局游戏宽度 then
			self.x = 224+(全局游戏宽度-800)/2
		end
		self.数据=数据
		insert(tp.窗口_,self)
		tp.运行时间 = tp.运行时间 + 1
		self.窗口时间 = tp.运行时间
		self.可视 = true
	end
end
function 场景类_召唤兽吞噬界面:重新加载资源()
	local 资源 = tp.资源
	local 按钮 =tp._按钮
	local 自适应 = tp._自适应
	self.资源组 = {
		[1] = 自适应.创建(0,1,455,440,3,9),
		[2] = 按钮.创建(自适应.创建(18,4,16,16,4,3),0,0,4,true,true),
		[3] = 自适应.创建(3,1,80,18,1,3),
		[4]=  按钮.创建(自适应(11,4,70,20,1),0,0,4,true,true,"确认进阶"),
		[5] = 资源:载入('代代格子.png',"加密图片"),
	}
	local wz = require("gge文字类")
   self.情谊大 = wz.创建(程序目录.."Data/pic/qingyi.ttf",14,false,true,true)
	self.情谊小 = wz.创建(程序目录.."Data/pic/qingyi.ttf",26,false,true,true)
	self.情谊大:置颜色(0xffffffff)
	self.情谊大:置描边颜色(0xff000000)
	local 格子 = tp._物品格子
	self.材料 = 格子(0,0,i1,"材料")
	self.银子 = 格子(0,0,i1,"材料")
	self.仙玉 = 格子(0,0,i1,"材料")
end
function 场景类_召唤兽吞噬界面:显示(dt,x,y)
	local bbs = self.数据
	local bbsa = #bbs
	self.焦点 = false
	self.资源组[1]:显示(self.x,self.y)
	tp.窗口标题背景_:显示(self.x+self.资源组[1].宽度/2-90,self.y)
	tp.字体表.华康字体:置颜色(0xFFFFFFFF):显示(self.x+self.资源组[1].宽度/2-90+tp.窗口标题背景_.宽度/2-tp.字体表.描边字体:取宽度("魂兽进阶")/2,
		self.y+3,"魂兽进阶")
	local v = self.x + self.资源组[1].宽度 - 35
	self.资源组[2]:显示(v+16,self.y+3)
	self.资源组[2]:更新(x,y)
	if self.资源组[2]:事件判断() then
		self:打开()
		return
	end
--print(左右,上下)
	self.资源组[4]:显示(self.x+362,self.y+344)
	box(self.x+15,self.y+35,self.x+169,self.y+430,ARGB(255,210,203,234))
	if self.吞噬数据==nil then
		引擎.画矩形(self.x+178,self.y+75,self.x+445,self.y+175,ARGB(255,58,74,91))
		daidaihuakuang(self.x+178,self.y+75,self.x+445,self.y+175,0XFFFF0000)
		self.情谊大:置颜色(0xffffffff):显示(self.x+230,self.y+39,"魂兽进阶介绍")
		self.情谊大:置颜色(0xffffffff):显示(self.x+187,self.y+80,"魂兽年限要求:")
		self.情谊大:置颜色(0xffffffff):显示(self.x+187,self.y+105,"魂兽材料要求:")
		self.情谊大:置颜色(0xffffffff):显示(self.x+187,self.y+130,"魂兽进阶提升:")
		self.情谊大:置颜色(0xffffffff):显示(self.x+187,self.y+155,"魂兽提升比例:")
		self.情谊大:置颜色(4278255360):显示(self.x+277,self.y+80,"年限最低为10年")
		self.情谊大:置颜色(4278255360):显示(self.x+277,self.y+105,"魂兽碎片,银子,仙玉")
		self.情谊大:置颜色(4278255360):显示(self.x+277,self.y+130,"资质,成长")
		self.情谊大:置颜色(4278255360):显示(self.x+277,self.y+155,"每百年,千年,万年加成不同")
		self.情谊大:置颜色(4278255360):显示(self.x+203,self.y+229,"本服所有玩家均可\n合成升级终极宝宝")
	else
		self.资源组[5]:显示(self.x+177,self.y+259)
		self.资源组[5]:显示(self.x+269,self.y+259)
		self.资源组[5]:显示(self.x+361,self.y+259)
		for i=1,8 do
			self.资源组[3]:显示(self.x+236,self.y+15+i*24)
			tp.字体表.普通字体:置颜色(0xFFFFFFFF):显示(self.x+175,self.y+17+i*24,bd0[i])
		end
	end

		for i=1,#bbs do
		if bbs[i+self.加入] ~= nil   then
			local jx = self.x+18
			local jy = self.y+(i*43)-5
			bw:置坐标(jx,jy+1)
			if self.头像组[i+self.加入] == nil or self.头像组[i+self.加入][1] ~= bbs[i+self.加入].造型 then
				self.头像组[i+self.加入] = {bbs[i+self.加入].造型}
				local n =  ModelData[self.头像组[i+self.加入][1]]
				self.头像组[i+self.加入][2] = tp.资源:载入(n.头像资源,"网易WDF动画",n.小头像)
			end
			if bw:检查点(x,y) then
				if mouseb(0) and self.鼠标 and not tp.消息栏焦点 then
					if self.召唤兽 ~= i + self.加入  then
						if self.召唤兽 == nil then
							self.召唤兽 = i + self.加入
					     else
						self.召唤兽 = i + self.加入
						end
                         if self.召唤兽~=nil and self.数据[self.召唤兽].年限~=nil then
                         	self.吞噬数据=nil
                            发送数据(140,{编号=self.召唤兽})
                         end
					else
						if self.召唤兽 == i + self.加入 then
							self.召唤兽 = nil
							--self:主置形象()
						end
					end
				end
				self.焦点 = true
			end
			box(jx-2,jy-3,jx+150,jy+39,ARGB(255,44,66,88))
			if self.召唤兽 == i + self.加入  then
				box(jx-2,jy-3,jx+150,jy+39,-2097481216)
			end
			tp.宠物头像背景_:显示(jx+1,jy)
			self.头像组[i][2]:显示(jx+4,jy+4)
			if self.召唤兽 == i + self.加入 and  self.吞噬数据~=nil  then
				bb = bbs[self.召唤兽]
				zts:置颜色(-16777216)
				zts:显示(self.x + 241,self.y + 40,bb.攻资)
				zts:显示(self.x + 241,self.y + 64,bb.防资)
				zts:显示(self.x + 241,self.y + 88,bb.体资)
				zts:显示(self.x + 241,self.y + 112,bb.法资)
				zts:显示(self.x + 241,self.y + 136,bb.速资)
				zts:显示(self.x + 241,self.y + 160,bb.躲资)
				zts:显示(self.x + 241,self.y + 184,bb.成长)
			    zts:显示(self.x + 241,self.y + 208,bb.年限)
                if self.吞噬数据~=nil then
                	zts:置颜色(4278255360)
                	for i=1,8 do
                		self.资源组[3]:显示(self.x+365,self.y+15+i*24)
                		zts:显示(self.x+325,self.y+15+i*24,">>>>")
                	end
                	zts:置颜色(4294901760)
                	zts:显示(self.x + 370,self.y + 40,bb.攻资+self.吞噬数据.资质增加)
                	zts:显示(self.x + 370,self.y + 64,bb.防资+self.吞噬数据.资质增加)
                	zts:显示(self.x + 370,self.y + 88,bb.体资+self.吞噬数据.资质增加)
                	zts:显示(self.x + 370,self.y + 112,bb.法资+self.吞噬数据.资质增加)
                	zts:显示(self.x + 370,self.y + 136,bb.速资+self.吞噬数据.资质增加)
                	zts:显示(self.x + 370,self.y + 160,bb.躲资+self.吞噬数据.资质增加)
                	zts:显示(self.x + 370,self.y + 184,bb.成长+self.吞噬数据.成长增加)
                	zts:显示(self.x + 370,self.y + 208,bb.年限+self.吞噬数据.年限递增)
                	zts:置颜色(0xFF000000)
                	self.材料:置坐标(self.x+177,self.y+259)
                	self.材料:显示(dt,x,y,self.鼠标)
                	self.银子:置坐标(self.x+269,self.y+259)
                	self.银子:显示(dt,x,y,self.鼠标)
                	self.仙玉:置坐标(self.x+361,self.y+259)
                	self.仙玉:显示(dt,x,y,self.鼠标)
                	if self.材料.焦点 and self.材料 ~= nil then
                		tp.提示:自定义(x,y-30,"材料:"..self.吞噬数据.吞噬材料.."*"..self.吞噬数据.吞噬数量)
                	elseif self.银子.焦点 and self.银子 ~= nil then
                		tp.提示:自定义(x,y-30,"银子:"..self.吞噬数据.吞噬银子)
                	elseif self.仙玉.焦点 and self.仙玉 ~= nil then
                		tp.提示:自定义(x,y-30,"仙玉:"..self.吞噬数据.吞噬仙玉)
                	end
                	if self.吞噬数据.满足材料 then
                		self.情谊大:置颜色(4278255360):显示(self.x+183,self.y+317,"OK")
                	else
                		self.情谊大:置颜色(4294901760):显示(self.x+183,self.y+317,"NG")
                	end
                	if self.吞噬数据.满足银子 then
                		self.情谊大:置颜色(4278255360):显示(self.x+275,self.y+317,"OK")
                	else
                		self.情谊大:置颜色(4294901760):显示(self.x+275,self.y+317,"NG")
                	end
                	if self.吞噬数据.满足仙玉  then
                		self.情谊大:置颜色(4278255360):显示(self.x+367,self.y+317,"OK")
                	else
                		self.情谊大:置颜色(4294901760):显示(self.x+367,self.y+317,"NG")
                	end
	                	self.资源组[4]:更新(x,y,self.召唤兽~=nil and self.吞噬数据.满足银子 and self.吞噬数据.满足材料 and self.吞噬数据.满足仙玉)
	                	if self.资源组[4]:事件判断() then
						发送数据(141,{编号=self.召唤兽})
				    	end
                end
			end
			if bbs[i+self.加入].参战信息 ~= nil then
				zts:置颜色(-65536)
			else
				zts:置颜色(-16777216)
			end
			zts:显示(jx+41,jy+4,bbs[i+self.加入].名称)
			zts:显示(jx+41,jy+21,bbs[i+self.加入].年限.."年")
		end
	end


--print(左右,上下)
end


function 场景类_召唤兽吞噬界面:检查点(x,y)
	if self.资源组[1]:是否选中(x,y)  then
		return true
	end
end
function 场景类_召唤兽吞噬界面:取年限加成(年限)
	local 临时名称="无法进阶"
	if 年限==10 then
		临时名称="十年◇魂兽碎片"
	elseif 年限==100 then
		临时名称="百年◇魂兽碎片"
	elseif 年限==1000 then
		临时名称="千年◇魂兽碎片"
	elseif 年限==10000 then
		临时名称="万年◇魂兽碎片"
	elseif 年限==100000 then
		临时名称="十万年◇魂兽碎片"
		end
		return 临时名称
end
function 场景类_召唤兽吞噬界面:取重生加成(重生)
	local 临时名称="无"
	if 重生==1 then
		临时名称="增加20%伤害结果"
	elseif 重生==2 then
		临时名称="增加40%伤害结果"
	elseif 重生==3 then
		临时名称="增加60%伤害结果"
	elseif 重生==4 then
		临时名称="增加80%伤害结果"
	elseif 重生==5 then
		临时名称="增加100%伤害结果"
	elseif 重生==6 then
		临时名称="增加120%伤害结果"
	elseif 重生==7 then
		临时名称="增加140%伤害结果"
	elseif 重生==8 then
		临时名称="增加160%伤害结果"
	elseif 重生==9 then
		临时名称="增加180%伤害结果"
	elseif 重生==10 then
		临时名称="增加200%伤害结果"
	end
return 临时名称
end
function 场景类_召唤兽吞噬界面:初始移动(x,y)
	tp.运行时间 = tp.运行时间 + 1
	if not tp.消息栏焦点 then
  		self.窗口时间 = tp.运行时间
 	end
	if not self.焦点 then
		tp.移动窗口 = true
	end
	if self.鼠标 and  not self.焦点 then
		self.xx = x - self.x
		self.yy = y - self.y
	end
end

function 场景类_召唤兽吞噬界面:开始移动(x,y)
	if self.鼠标 then
		self.x = x - self.xx
		self.y = y - self.yy
	end
end


return 场景类_召唤兽吞噬界面